home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 1996 April: Mac OS SDK / Dev.CD Apr 96 SDK / Dev.CD Apr 96 SDK2.toast / Development Kits (Disc 2) / QuickTime / Programming Stuff / Documentation / develop articles / develop Issue 12 / Time Bases / TimeBaseSimple / TimeBaseSimple.r < prev    next >
Encoding:
Text File  |  1992-10-16  |  2.0 KB  |  136 lines  |  [TEXT/MPS ]

  1. #include "Pict.r"
  2. #include "Types.r"
  3.  
  4. /* define a rects list resource type */
  5. type 'RCT#' {
  6.     integer = $$Countof(RectArray);
  7.     array RectArray {
  8.             rect;                                        /* String                */
  9.     };
  10. };
  11.  
  12. resource 'RCT#' (128) { {
  13. /* 0 */    {100, 10, 120, 85},     /* 'Duration = ' */
  14. /* 1 */    {100, 90, 120,160},        /* duration */
  15. /* 2 */    {100, 165, 120, 215},    /* scale    */
  16.  
  17. /* 3 */    {175, 10, 195, 85},        /* 'Rate Settings' */
  18.  
  19. /* 4 */    {200, 10, 220, 85},        /* 'Current = ' */
  20. /* 5 */    {200, 90, 220, 160},    /* rate            */
  21.  
  22. /* 6 */    {225, 10, 245, 85},        /* 'Preferred = */
  23. /* 7 */    {225, 90, 245, 160},    /* rate            */
  24.  
  25. /* 8 */    {265, 10, 285, 215},    /* clock        */
  26.  
  27. /* 9 */    {125, 10, 145, 85},        /* 'start time '*/
  28. /* 10 */{125, 90, 145, 160},    /* starttime    */
  29.  
  30. /* 11 */{150, 10, 170, 85},        /* 'stop time ' */
  31. /* 12 */{150, 90, 170, 160},    /* stopTime      */
  32.  
  33. /* 13 */{230, 8, 340, 508},}    /* unused        */
  34. };
  35.  
  36.  
  37. resource 'WIND' (128) {
  38.     {40, 8, 340, 508},
  39.     noGrowDocProc,
  40.     visible,
  41.     goAway,
  42.     0x0,
  43.     "TimeBaseSimple Window"
  44. };
  45.  
  46. resource 'CNTL' (128) {
  47.     {4, 10, 90, 126},
  48.     0,
  49.     visible,
  50.     900,
  51.     0,
  52.     2048,
  53.     0,
  54.     ""
  55. };
  56.  
  57. resource 'CNTL' (129) {
  58.     {4, 100, 20, 195},
  59.     1,
  60.     visible,
  61.     1,
  62.     0,
  63.     radioButProc,
  64.     0,
  65.     "No looping"
  66. };
  67.  
  68. resource 'CNTL' (130) {
  69.     {22, 100, 38, 195},
  70.     0,
  71.     visible,
  72.     1,
  73.     0,
  74.     radioButProc,
  75.     0,
  76.     "Yes looping"
  77. };
  78.  
  79. resource 'CNTL' (131) {
  80.     {40, 100, 56, 195},
  81.     0,
  82.     visible,
  83.     1,
  84.     0,
  85.     radioButProc,
  86.     0,
  87.     "Palindrome"
  88. };
  89.  
  90. resource 'CNTL' (132) {
  91.     {225, 178, 245, 235},
  92.     0,
  93.     visible,
  94.     1,
  95.     0,
  96.     pushButProc,
  97.     0,
  98.     "Set Rate"
  99. };
  100.  
  101. resource 'CNTL' (133) {
  102.     {225, 240, 245, 290},
  103.     0,
  104.     visible,
  105.     1,
  106.     0,
  107.     pushButProc,
  108.     0,
  109.     "Reset"
  110. };
  111.  
  112. resource 'PICT' (133) {
  113.     {226, 162, 244, 173},
  114.     VersionOne {
  115.         {    /* array OpCodes: 2 elements */
  116.             /* [1] */
  117.             clipRgn {
  118.                 {-30000, -30000, 30000, 30000},
  119.                 $""
  120.             },
  121.             /* [2] */
  122.             bitsRect {
  123.                 2,
  124.                 {226, 162, 244, 173},
  125.                 {226, 162, 244, 173},
  126.                 {226, 162, 244, 173},
  127.                 srcCopy,
  128.                 $"3F80 4040 8420 8E20 9F20 BFA0 8E20 8E20"
  129.                 $"8020 8020 8E20 8E20 BFA0 9F20 8E20 8420"
  130.                 $"4040 3F80"
  131.             }
  132.         }
  133.     }
  134. };
  135.  
  136.